object PathDlg: TPathDlg Left = 296 Top = 118 BorderIcons = [biSystemMenu] BorderStyle = bsDialog Caption = 'Select Path Name' ClientHeight = 320 ClientWidth = 281 Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Icon.Data = {} Position = poScreenCenter OnActivate = FormActivate PixelsPerInch = 96 TextHeight = 13 object DlgPanel: TPanel Left = 8 Top = 32 Width = 177 Height = 281 Enabled = False TabOrder = 7 object PathName: TLabel Left = 16 Top = 8 Width = 53 Height = 13 Caption = 'Path &Name' FocusControl = PathEdit end object DirName: TLabel Left = 16 Top = 56 Width = 61 Height = 13 Caption = 'Directory &List' FocusControl = DirList end object DiskName: TLabel Left = 16 Top = 232 Width = 21 Height = 13 Caption = '&Disk' FocusControl = DiskList end end object OKBtn: TButton Left = 196 Top = 48 Width = 77 Height = 25 Caption = 'OK' Default = True ModalResult = 1 TabOrder = 0 OnClick = OKBtnClick end object CancelBtn: TButton Left = 196 Top = 78 Width = 77 Height = 25 Cancel = True Caption = 'Cancel' ModalResult = 2 TabOrder = 1 end object DiskList: TDriveComboBox Left = 24 Top = 280 Width = 145 Height = 19 DirList = DirList TabOrder = 3 OnChange = DiskListChange end object DirList: TDirectoryListBox Left = 24 Top = 104 Width = 145 Height = 153 ItemHeight = 16 TabOrder = 4 OnChange = DirListChange end object PathEdit: TEdit Left = 24 Top = 56 Width = 145 Height = 21 TabOrder = 5 Text = 'C:\Program Files\DDClip' end object StatusText: TPanel Left = 8 Top = 8 Width = 265 Height = 24 Enabled = False Caption = 'Select Destination Directory' Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] Locked = True ParentFont = False TabOrder = 6 end object NetBtn: TButton Left = 196 Top = 110 Width = 77 Height = 25 Cancel = True Caption = 'Network' ModalResult = 2 TabOrder = 2 OnClick = NetBtnClick end end